home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Sirens of the Pleasure Dome
/
Sirens of the Pleasure Dome.iso
/
pc
/
vvdemo.dir
/
00619_Script_619
< prev
next >
Wrap
Text File
|
1996-06-29
|
2KB
|
41 lines
on exitFrame
global Copies1, SUBTOTAL1, TAX1, TOTAL1, NJ1, shipping1, DOB
If the text of cast 470 = 1 then set Subtotal1 = 1 * "48.99"
If the text of cast 470 = 2 then set Subtotal1 = 2 * "48.99"
If the text of cast 470 = 3 then set Subtotal1 = 3 * "48.99"
If the text of cast 470 = 4 then set Subtotal1 = 4 * "48.99"
If the text of cast 470 = 5 then set Subtotal1 = 5 * "48.99"
If the text of cast 470 = 6 then set Subtotal1 = 6 * "48.99"
If the text of cast 470 = 7 then set Subtotal1 = 7 * "48.99"
If the text of cast 470 = 8 then set Subtotal1 = 8 * "48.99"
If the text of cast 470 = 9 then set Subtotal1 = 9 * "48.99"
If the text of cast 470 = 10 then set Subtotal1 =10 * "48.99"
If the text of cast 470 = 11 then set Subtotal1 =11 * "48.99"
If the text of cast 470 = 12 then set Subtotal1 =12 * "48.99"
If the text of cast 470 = 13 then set Subtotal1 =13 * "48.99"
If the text of cast 470 = 14 then set Subtotal1 =14 * "48.99"
If the text of cast 470 = 15 then set Subtotal1 =15 * "48.99"
If the text of cast 470 = 16 then set Subtotal1 =16 * "48.99"
If the text of cast 470 = 17 then set Subtotal1 =17 * "48.99"
If the text of cast 470 = 18 then set Subtotal1 =18 * "48.99"
If the text of cast 470 = 19 then set Subtotal1 =19 * "48.99"
If the text of cast 470 = 20 then set Subtotal1 =20 * "48.99"
If the text of cast 470 = 21 then set Subtotal1 =21 * "48.99"
If the text of cast 470 = 22 then set Subtotal1 =22 * "48.99"
If the text of cast 470 = 23 then set Subtotal1 =23 * "48.99"
If the text of cast 470 = 24 then set Subtotal1 =24 * "48.99"
If the text of cast 470 = 25 then set Subtotal1 =25 * "48.99"
If the text of cast 470 = 10 then set Subtotal1 =10 * "48.99"
put subtotal1 into field "subtotal"
IF the text of cast 467 = "NJ" then set Tax1 = (subtotal1 * .06)
else IF the text of cast 467 = "N.J." then set Tax1 = (subtotal1 * .06)
else IF the text of cast 467 = "N J" then set Tax1 = (subtotal1 * .06)
else IF the text of cast 467 = "New Jersey" then set Tax1 = (subtotal1 * .06)
else set tax1 = tax1 + 0
IF the text of cast 474 = "5.00" then set shipping1 = "5.00"
IF the text of cast 474 = "5.00" then set shipping1 = "5.00"
put tax1 into field "tax"
If the Text of cast 486 > 79 then go to "dob"
GO TO THE FRAME
end